home *** CD-ROM | disk | FTP | other *** search
/ Aminet 50 / Aminet 50 (2002)(GTI - Schatztruhe)[!][Aug 2002].iso / Aminet / dev / lang / nA-Iaiov0.7.lha / Iaio_v0.7ﾟ / Examples / setcol.ajo < prev    next >
Text File  |  2002-04-15  |  176b  |  18 lines
  1.  
  2. openscreen[0]=320/240/1/l//;
  3.  
  4. set[0,255]
  5. setcol[0,0,!0,!0,!0]
  6. delay[!0]
  7.  
  8. setcol[0,0,255,0,0]
  9. delay[!0]
  10.  
  11. set[0,0]
  12. setcol[0,0,!0,!0,!0]
  13. set[0,50]
  14. delay[!0]
  15.  
  16. closescreen[0]
  17. quit
  18.